home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
winsweep
/
help.frm
< prev
next >
Wrap
Text File
|
1995-05-07
|
1KB
|
50 lines
VERSION 2.00
Begin Form Form2
BackColor = &H00C0FFC0&
BorderStyle = 1 'Fixed Single
Caption = "WinSweep HELP"
ClientHeight = 5115
ClientLeft = 2550
ClientTop = 1275
ClientWidth = 6390
Height = 5520
Left = 2490
LinkMode = 1 'Source
LinkTopic = "Form2"
MaxButton = 0 'False
ScaleHeight = 5115
ScaleWidth = 6390
Top = 930
Width = 6510
Begin CommandButton Command1
Caption = "Return To browser"
Height = 495
Left = 2160
TabIndex = 1
Top = 4440
Width = 2055
End
Begin TextBox text1
Height = 4215
Left = 120
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 0
Top = 120
Width = 6135
End
End
Sub Command1_Click ()
form1.Show
form2.Hide
End Sub
Sub Form_Load ()
msg$ = String$(10000, " ")
Open "C:\winsweep.hlp" For Binary As #5
Get 5, , msg$
Close 5
text1.text = msg$
End Sub